Colson Caster Selection Guide 3/Colson Caster Selection Guide 3.0.iso/data1.cab/Program_Executable_Files/colsoncd.dxr/00001Series_33_RibbedSteel.ls

Text File | 2000-01-12 | 1.7 KB | 29 lines

on mouseUp
  if the hilite of cast "ribbedsteel" = 1 then
    set the visible of sprite 52 to 0
    set the visible of sprite 53 to 0
    set the visible of sprite 60 to 0
    set the visible of sprite 61 to 0
    set the visible of sprite 62 to 0
    set the visible of sprite 63 to 0
    set the visible of sprite 64 to 0
    set the visible of sprite 65 to 0
  end if
  if the hilite of cast "ribbedsteel" = 0 then
    if (the hilite of cast "asphalt" = 0) and (the hilite of cast "terrazzo" = 0) and (the hilite of cast "ribbedsteel" = 0) and (the hilite of cast "tile" = 0) and (the hilite of cast "metalchips" = 0) and (the hilite of cast "noisereduction" = 0) and (the hilite of cast "floorprotection" = 0) and (the hilite of cast "cushionload" = 0) then
      set the visible of sprite 52 to 1
      set the visible of sprite 53 to 1
    end if
  end if
  if the hilite of cast "ribbedsteel" = 0 then
    if (the hilite of cast "carpet" = 0) and (the hilite of cast "brick" = 0) and (the hilite of cast "concrete" = 0) and (the hilite of cast "asphalt" = 0) and (the hilite of cast "terrazzo" = 0) and (the hilite of cast "wood" = 0) and (the hilite of cast "ribbedsteel" = 0) and (the hilite of cast "tile" = 0) and (the hilite of cast "water" = 0) and (the hilite of cast "steam" = 0) and (the hilite of cast "noisereduction" = 0) and (the hilite of cast "floorprotection" = 0) and (the hilite of cast "cushionload" = 0) then
      set the visible of sprite 60 to 1
      set the visible of sprite 61 to 1
      set the visible of sprite 62 to 1
      set the visible of sprite 63 to 1
      set the visible of sprite 64 to 1
      set the visible of sprite 65 to 1
    end if
  end if
end